object fmCustOrd: TfmCustOrd Left = 256 Top = 276 Width = 320 Height = 230 Caption = 'Data Navigation' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsMDIChild Position = poDefault Visible = True OnActivate = FormActivate OnClose = FormClose PixelsPerInch = 96 TextHeight = 13 object DBEdit1: TDBEdit Left = 8 Top = 8 Width = 241 Height = 20 DataField = 'Company' DataSource = DM1.CustomersSource MaxLength = 30 TabOrder = 0 end object DBGrid1: TDBGrid Left = 8 Top = 32 Width = 289 Height = 153 Columns = < item FieldName = 'OrderNo' end item FieldName = 'CustNo' end item FieldName = 'SaleDate' end item FieldName = 'ShipDate' Width = 60 end> DataSource = DM1.OrdersSource TabOrder = 1 TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] OnEnter = DBGrid1Enter end end